home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Arcade / WARGAMES.ARC / WB 2 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  850 b   |  29 lines
  1. 5 POKE792,207:POKE793,2
  2. 10 IFPEEK(49920)=131THEN120
  3. 15 IFPEEK(49153)=187THEN115
  4. 20 IFPEEK(25599)=186THENSYS16320:GOTO110
  5. 25 PRINT"[147]":POKE53281,0:POKE53280,2
  6. 30 PRINTTAB(13);"[129]  WAR GAMES  [146]"
  7. 32 PRINTTAB(17);"V2.2"
  8. 35 PRINTTAB(7);"[158]COMPILED AND REWRITTEN BY:"
  9. 40 PRINTTAB(14);"R. C. DAVIS"
  10. 45 PRINTTAB(16);"11,1,84"
  11. 50 PRINT"[154]    THIS DISK IS O.K. TO COPY"
  12. 55 PRINT
  13. 60 PRINT"    IF YOU HAVE ANY IDEAS ON HOW TO"
  14. 65 PRINT" IMPROVE THESE GAMES,OR ANY SUGGESTIONS"
  15. 70 PRINT"     AT ALL, PLEASE CONTACT ME AT:"
  16. 75 PRINTTAB(13);"[158]R. C. DAVIS"
  17. 80 PRINTTAB(13);"RRT. 5"
  18. 85 PRINTTAB(13);"DIXON, ILL.  61021"
  19. 90 PRINTTAB(13);"815 288-6412"
  20. 95 PRINT"        SUB PROGRAMS NOW LOADING"
  21. 100 LOAD"TITLE",8,1
  22. 110 LOAD"SAM",8,1
  23. 115 LOAD"DIS",8,1
  24. 120 POKE743,0:POKE744,48:POKE746,123:POKE747,2:POKE749,55:POKE751,124:POKE752,2
  25. 130 POKE754,13:POKE756,125:POKE757,2:POKE758,169:POKE792,167:POKE793,2
  26. 140 PRINT"[144]LOAD";CHR$(34);"WAR GAMES";CHR$(34);",8,1"
  27. 150 POKE631,19:POKE632,13:POKE633,82:POKE634,117:POKE635,58:POKE636,13
  28. 160 POKE198,6:END
  29.